home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Workbench / Datatypes / FONTDT13.LHA / Install FontDT < prev    next >
Encoding:
Text File  |  1996-05-27  |  2.0 KB  |  106 lines
  1. ; Installer script for FontDT
  2. ; $VER: Install FontDT 39.5 (27.5.96)
  3.  
  4. (complete 0)
  5.  
  6. (set #l-dest "LIBS:DataTypes/")
  7. (set #permanent-dest "DEVS:DataTypes/")
  8. (set #default-dest "SYS:Storage/DataTypes/")
  9.  
  10. (set #dt "Libs/DataTypes/font.datatype")
  11. (set #recog "Devs/DataTypes/")
  12.  
  13. ; ***************************************************************************
  14. ; English strings
  15.  
  16. (set #bad-kick
  17.     (cat "You must have AmigaDOS 3.0 or higher to use FontDT!"))
  18.  
  19. (set #welcome
  20.     (cat "\nFontDT installation\n\n\n"
  21.        "This script will install FontDT 1.3\n"
  22.        "on your Amiga.\n\n\n\n"
  23.        "FontDT is\n"
  24.        "Copyright © 1995-96 Michal Letowski\n"
  25.        "All rights reserved.\n\n"))
  26.  
  27. (set #where-driver
  28.     (cat "Should FontDT be installed permanently?"))
  29.  
  30. (set #where-help
  31.     (cat "\nDataTypes can be installed as Permanently Enabled"
  32.          " or Manually Selectable.\n"
  33.        "Pemanently Enabled means that the DataType is always"
  34.        " ready for use.\n"
  35.        "Manually Selectable means that the datatype has to be"
  36.        " activated before it can be used.\n"))
  37.  
  38. (set #dt-prompt
  39.     (cat "Copying shared library"))
  40.  
  41. (set #recog-prompt
  42.     (cat "Copying recognition files"))
  43.  
  44. ; ***************************************************************************
  45. ; Install FontDT
  46.  
  47. ; Check AmigaDOS version
  48. (set #version (/ (getversion) 65536))
  49. (if (< #version 39)
  50.     (
  51.         (abort #bad-kick)
  52.     )
  53. )
  54.  
  55. (message #welcome)
  56.  
  57. (welcome)
  58. (set old_level @user-level)
  59.  
  60. (user 2)
  61. (set #perm
  62.     (askbool
  63.         (prompt #where-driver)
  64.         (help #where-help)
  65.         (default 0))
  66. )
  67. (if #perm
  68.     (set #recog-dest #permanent-dest)
  69.     (set #recog-dest #default-dest)
  70. )
  71.  
  72. ; Do copy
  73. (user old_level)
  74.  
  75. ; Copy library
  76. (copylib
  77.     (prompt #dt-prompt)
  78.     (help @copylib-help)
  79.     (source #dt)
  80.     (dest #l-dest)
  81.     (confirm)
  82.     (optional "nofail")
  83. )
  84. (complete 40)
  85.  
  86. ; Copy recog
  87. (copyfiles
  88.     (prompt #recog-prompt)
  89.     (help @copyfiles-help)
  90.     (source #recog)
  91.     (dest #recog-dest)
  92.     (confirm)
  93.     (optional "nofail")
  94.     (all)
  95. )
  96. (complete 80)
  97.  
  98. ; Activate descriptors if Permanently enabled
  99. (if #perm
  100.     (run "AddDataTypes REFRESH")
  101. )
  102. (complete 100)
  103.  
  104. (set @default-dest "")
  105. (exit)
  106.